IBM InfoROM for OS/2 Beta 1995 January/IBM InfoROM for OS2 Beta 1-1995.ISO/testcert/storage/function/cdrom/t1.scr

Text File | 1994-09-02 | 821 b | 33 lines

@thread t1.LOG
@NewAlias cd CDROM.GRA
@IMPORT SYSINFO.TXT
cd LOG $PROMPT="LOGGING RESUMEAUDIO2"
cd LOG $PROMPT="THREAD 1"
cd set ADDRESSMODE=REDBOOK
cd set TIMESTART=12:50:62
cd set TIMESTOP=20:00:00
cd CDROM_OPEN
cd CDROM_PLAYAUDIO
cd response $PROMPT="PLAYING AUDIO FOR 25 SECONDS" $PAUSE=25
cd response $PROMPT="STOPPING AUDIO" $PAUSE=1
cd CDROM_STOPAUDIO
cd CDROM_CLOSE
@flush cd
*
*
*
@thread t1.LOG
@NewAlias cd1 CDROM.GRA
@IMPORT SYSINFO2.TXT
cd1 LOG $PROMPT="LOGGING RESUMEAUDIO2"
cd1 LOG $PROMPT="THREAD 2"
cd1 CDROM_OPEN
cd1 response $PROMPT="WAITING FOR AUDIO TO STOP" $PAUSE=35
cd1 response $PROMPT="AUDIO WILL RESUME IN 10 SECONDS" $PAUSE=10
cd1 CDROM_RESUMEAUDIO
cd1 response $PROMPT="PLAYING AUDIO FOR 25 SECONDS" $PAUSE=25
cd1 CDROM_STOPAUDIO
cd1 CDROM_CLOSE
@flush cd1